Imports System
Imports Microsoft.VisualBasic
Imports csharpkod
Imports personid

Namespace flspartnerweb

  Partial Class addVehicleStep3_aspx_vb
        Inherits Functions
    Public strGrey As Object 
    Public rowNumber As Integer 
    Public subDo As String 
    Public clientCount As Object 
    Public country As Object ' System.Object
        Public client As Object
        Public client_lastname As Object
    Public street As String 
    Public zipcode As String 
    Public city As String 
    Public areacode As String 
    Public telephone As String 
    Public email As String 
    Public cin As String 
    Public clientType As Object 
    Public partnerName As Object ' System.Object
    Public partnerID As Object 
    Public dealerID As Object 
    Public dealer As Object ' System.Object
    Public chooseClient As Object ' System.Object
    Public dealerEmployee As Object ' System.Object
        Public dealerEmployeeID As Object
        Public DisplayErrorCin As Object
        Public identyselected As Integer
        Public identityText As String
        Public clientText As String
        Public pwd As String
        Public username As String
        Public salesman As String
        Public temp As Integer






       

        Function ValidCompany(ByVal incoming As String) As Boolean
            Dim isValid As Boolean
            Return personid.VeryifyCPR.CheckCVR(incoming)


        End Function
        Function ValidCinPerson(ByVal Personnummer As String) As Boolean
            Dim isValid As Boolean
            Return personid.VeryifyCPR.CheckCPR(Personnummer)
        End Function
    End Class


End Namespace
